From: Jim Blandy <jimb@redhat.com>
Date: Sat, 12 Jun 1993 17:23:13 +0000 (+0000)
Subject: * xfns.c [! HAVE_X11R5] (Fx_rebind_key): Recognize that
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95368
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=fb351039483a30f8c5c666cf9df7066d35ac0bd8;p=emacs.git

* xfns.c [! HAVE_X11R5] (Fx_rebind_key): Recognize that
	XK_Mode_switch and XK_Num_Lock are modifier keysyms too.
---

diff --git a/src/xfns.c b/src/xfns.c
index 6b1eb465b2c..3d5d07e28a5 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -3353,8 +3353,15 @@ also be depressed for NEWSTRING to appear.")
 	  mod = Fcar (rest);
 	  CHECK_STRING (mod, 3);
 	  modifier_list[i] = XStringToKeysym ((char *) XSTRING (mod)->data);
+#ifndef HAVE_X11R5
+	  if (modifier_list[i] == NoSymbol
+	      || !(IsModifierKey (modifier_list[i]) 
+                   || ((unsigned)(modifier_list[i]) == XK_Mode_switch)
+                   || ((unsigned)(modifier_list[i]) == XK_Num_Lock)))
+#else
 	  if (modifier_list[i] == NoSymbol
 	      || !IsModifierKey (modifier_list[i]))
+#endif
 	    error ("Element is not a modifier keysym");
 	  i++;
 	}